home *** CD-ROM | disk | FTP | other *** search
Gui4CLI script | 1999-06-16 | 1.3 KB | 51 lines |
- G4C
-
- ; An example of a simple listview.
- ; --------------------------------------------------------------
-
- ; This is a simple TXT type listview.
-
- ; It has to be given the name of a file to display, and for
- ; this example we'll give it the "guis:docs/printme" file.
-
-
- WINBIG -1 -1 566 170 ListViews.gc ; our window
- WinType 11110001 ; resizable with all gadgets
- Box 0 0 0 0 out button ; decorative window border
-
- ; --------------------------------------------------------------
- ; System events
- ; --------------------------------------------------------------
-
- xOnLoad
- GuiOpen ListViews.gc
-
- xOnClose
- GuiQuit ListViews.gc
-
-
- ; --------------------------------------------------------------
- ; The listview
- ; --------------------------------------------------------------
-
- ; this is the actual listview. Every time the user clicks on it, we'll
- ; display the text of the line the user clicked on, in our text gadget
- ; below (GadID 1)
-
- XLISTVIEW 10 19 549 148 "" variable "guis:docs/Printme" 10 TXT
-
- ; update the TEXT gadget
- update ListViews.gc 1 $variable
-
-
- ; --------------------------------------------------------------
- ; The TEXT gadget
- ; --------------------------------------------------------------
-
- ; This is the lucky gadget that gets to display the line..
-
- TEXT 10 4 547 13 "Click any line.." 100 BOX
- gadid 1
-
-
-